home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Technotools
/
Technotools (Chestnut CD-ROM)(1993).ISO
/
lang_oth
/
m2cmp20
/
dta.def
< prev
next >
Wrap
Text File
|
1988-11-19
|
348b
|
21 lines
DEFINITION MODULE DTA;
(* (C) Copyright 1987,1988 Fitted Software Tools. All rights reserved. *)
(* Get / Set DOS Disk Transfer Address *)
FROM SYSTEM IMPORT ADDRESS;
PROCEDURE GetDTA( VAR adrs :ADDRESS );
(*
returns the current DTA at adrs.
*)
PROCEDURE SetDTA( adrs :ADDRESS );
(*
sets DTA to adrs
*)
END DTA.